PC Home 109/PC Home 109.iso/data1.cab/Program_Files/id007.dxr/00052.ls

Text File | 2001-03-02 | 952 b | 26 lines

on exitFrame
  set LastTick to the ticks
  repeat while the locH of sprite 6 < 147
    set x to 1 * (the ticks - LastTick)
    set LastTick to the ticks
    set the locH of sprite 6 to the locH of sprite 6 + x
    set the locH of sprite 7 to the locH of sprite 7 + x
    set the locH of sprite 4 to the locH of sprite 4 + random(2)
    set the locH of sprite 4 to the locH of sprite 4 - random(2)
    set the locH of sprite 5 to the locH of sprite 5 + random(2)
    set the locH of sprite 5 to the locH of sprite 5 - random(2)
    set the locH of sprite 8 to the locH of sprite 8 + random(2)
    set the locH of sprite 8 to the locH of sprite 8 - random(2)
    set the locV of sprite 8 to the locV of sprite 8 + random(2)
    set the locV of sprite 8 to the locV of sprite 8 - random(2)
    updateStage()
  end repeat
end

on mouseUp
  set the visible of sprite 5 to 0
  set the visible of sprite 6 to 0
  set the visible of sprite 7 to 0
  go(81)
end